Odesilani mailu z Delphi

Otázka od: Viktor Marek

3. 4. 2004 12:14

Zdravim

Pro odesilani mailu z Delphi pouzivam komponentu MAPIMail z kolekce SM
komponents.
Nejak mi nechce fungovat Form4.close; Dale byh se chtel zeptat, jak dostat
do odesilatele druhou adresu odesilatele, kterou mam OE 6 [D5 Prof]

Diky za radu

Viktor Marek
viktor@mbox.vol.cz

procedure TForm4.FormShow(Sender: TObject);
begin
  with TMAPIMail.Create(Self) do
    try
      Subject := 'Stav skladu';

Recipients.Add(XXXXX');
      Attachments.Add(ExtractFilePath(ParamStr(0)) + 'Zaloha\sklad.zip');
      Body := 'V
priloze zasilam stav skladu';
      EditDialog := True;
      Send
    finally
      Free
    end;
  Form4.cursor:=crDefault;
  Form4.close;
end;

Odpovedá: Petr Vones

3. 4. 2004 14:46

From: "Viktor Marek" <viktor@mbox.vol.cz>
> Pro odesilani mailu z Delphi pouzivam komponentu MAPIMail z kolekce SM
> komponents.
> Nejak mi nechce fungovat Form4.close; Dale byh se chtel zeptat, jak dostat
> do odesilatele druhou adresu odesilatele, kterou mam OE 6 [D5 Prof]

Podivej se na TJclEmail v JCL:
http://sourceforge.net/project/showfiles.php?group_id=47514&release_id=118195

Petr Vones